home *** CD-ROM | disk | FTP | other *** search
/ Programmer Power Tools / Programmer Power Tools.iso / ada / tritype.dum < prev    next >
Text File  |  1988-03-25  |  219b  |  8 lines

  1. -- Dummy solution for Outside Assignment 2
  2. -- Edit to become your real solution.
  3. separate (TRITEST)
  4. function TRITYPE(LEN1, LEN2, LEN3 : in INTEGER) return TRIANGLE is
  5. begin
  6.    return NOT_A_TRIANGLE;
  7. end TRITYPE;
  8.